home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / programm.ing / ltmf_120.lzh / LET_CRIT.RSH < prev    next >
Encoding:
Text File  |  1993-04-08  |  11.3 KB  |  311 lines
  1. /* GEM Resource C Source */
  2.  
  3. #include <portab.h>
  4. #include <aes.h>
  5. #include "LET_CRIT.H"
  6.  
  7. #if !defined(WHITEBAK)
  8. #define WHITEBAK    0x0040
  9. #endif
  10. #if !defined(DRAW3D)
  11. #define DRAW3D      0x0080
  12. #endif
  13.  
  14. #define FLAGS9  0x0200
  15. #define FLAGS10 0x0400
  16. #define FLAGS11 0x0800
  17. #define FLAGS12 0x1000
  18. #define FLAGS13 0x2000
  19. #define FLAGS14 0x4000
  20. #define FLAGS15 0x8000
  21. #define STATE8  0x0100
  22. #define STATE9  0x0200
  23. #define STATE10 0x0400
  24. #define STATE11 0x0800
  25. #define STATE12 0x1000
  26. #define STATE13 0x2000
  27. #define STATE14 0x4000
  28. #define STATE15 0x8000
  29.  
  30. TEDINFO rs_tedinfo[] =
  31. { "X",
  32.   "\0",
  33.   "\0",
  34.   IBM  , 0, TE_LEFT , 0x1100, 0, 0, 2, 1,
  35.   "X",
  36.   "\0",
  37.   "\0",
  38.   IBM  , 0, TE_CNTR , 0x1100, 0, 0, 2, 1,
  39.   "\042My Man\047s Gone Now.\042",
  40.   "\0",
  41.   "\0",
  42.   SMALL, 0, TE_LEFT , 0x1100, 0, 0, 21, 1,
  43.   "Man fliegt nicht mehr ohne ...",
  44.   "\0",
  45.   "\0",
  46.   SMALL, 0, TE_LEFT , 0x1200, 0, 0, 31, 1
  47. };
  48.  
  49. WORD RSBB0DATA[] =
  50. { 0x0000, 0x0000, 0x0000, 0x0000, 
  51.   0x0000, 0x0000, 0x0000, 0x0000, 
  52.   0x0000, 0x0000, 0x0000, 0x0000, 
  53.   0x0000, 0x0000, 0x0000, 0x0000, 
  54.   0x0000, 0x0000, 0x0000, 0x0000, 
  55.   0x0000, 0x0000, 0x0000, 0x0000, 
  56.   0x0000, 0x0000, 0x0000, 0x0000, 
  57.   0x0000, 0x0000, 0x0000, 0x0000, 
  58.   0x0000, 0x0000, 0x0000, 0x0000, 
  59.   0x0000, 0x0000, 0x0000, 0x0000, 
  60.   0x0000, 0x0000, 0x0000, 0x0000, 
  61.   0x0000, 0x0000, 0x0000, 0x0000, 
  62.   0x0000, 0x0000, 0x0000, 0x0000, 
  63.   0x0000, 0x0000, 0x0000, 0x0000, 
  64.   0x0000, 0x0000, 0x0000, 0x0000, 
  65.   0x0000, 0x0000, 0x0000, 0x0000
  66. };
  67.  
  68. WORD RSBB1DATA[] =
  69. { 0x0000, 0x0000, 0x3FFF, 0xFFFC, 
  70.   0x7FFF, 0xFFFE, 0x7FFC, 0x3FFE, 
  71.   0x7FF8, 0x1FFE, 0x7FF0, 0x0FFE, 
  72.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  73.   0x7FF8, 0x1FFE, 0x7FFC, 0x3FFE, 
  74.   0x7FFF, 0xFFFE, 0x7FFF, 0xFFFE, 
  75.   0x7FC0, 0x1FFE, 0x7F80, 0x0FFE, 
  76.   0x7F80, 0x0FFE, 0x7FC0, 0x0FFE, 
  77.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  78.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  79.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  80.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  81.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  82.   0x7F80, 0x01FE, 0x7F00, 0x00FE, 
  83.   0x7F00, 0x00FE, 0x7F80, 0x01FE, 
  84.   0x7FFF, 0xFFFE, 0x3FFF, 0xFFFC
  85. };
  86.  
  87. WORD RSBB2DATA[] =
  88. { 0x0000, 0x0000, 0x3FFF, 0xFFFC, 
  89.   0x7FFF, 0xFFFE, 0x7F80, 0x01FE, 
  90.   0x7F00, 0x00FE, 0x7E00, 0x007E, 
  91.   0x7E00, 0x007E, 0x7E00, 0x007E, 
  92.   0x7E03, 0xC07E, 0x7E07, 0xC07E, 
  93.   0x7F0F, 0x807E, 0x7FFF, 0x007E, 
  94.   0x7FFE, 0x007E, 0x7FFC, 0x00FE, 
  95.   0x7FF8, 0x01FE, 0x7FF8, 0x03FE, 
  96.   0x7FF0, 0x07FE, 0x7FF0, 0x0FFE, 
  97.   0x7FF0, 0x1FFE, 0x7FF0, 0x1FFE, 
  98.   0x7FF8, 0x3FFE, 0x7FFF, 0xFFFE, 
  99.   0x7FFF, 0xFFFE, 0x7FFC, 0x3FFE, 
  100.   0x7FF8, 0x1FFE, 0x7FF0, 0x0FFE, 
  101.   0x7FF0, 0x0FFE, 0x7FF0, 0x0FFE, 
  102.   0x7FF8, 0x1FFE, 0x7FFC, 0x3FFE, 
  103.   0x7FFF, 0xFFFE, 0x3FFF, 0xFFFC
  104. };
  105.  
  106. WORD RSBB3DATA[] =
  107. { 0x0000, 0x0000, 0x3FFF, 0xFFFC, 
  108.   0x7FFF, 0xFFFE, 0x7FFE, 0x7FFE, 
  109.   0x7FCC, 0x3FFE, 0x7F84, 0x33FE, 
  110.   0x7984, 0x21FE, 0x7084, 0x21FE, 
  111.   0x7084, 0x21FE, 0x7084, 0x21FE, 
  112.   0x7084, 0x21FE, 0x7084, 0x21FE, 
  113.   0x7084, 0x218E, 0x7084, 0x218E, 
  114.   0x7084, 0x210E, 0x7084, 0x210E, 
  115.   0x7084, 0x220E, 0x7000, 0x020E, 
  116.   0x7000, 0x021E, 0x7000, 0x0C1E, 
  117.   0x7000, 0x303E, 0x7800, 0xC03E, 
  118.   0x7801, 0x007E, 0x7C01, 0x00FE, 
  119.   0x7E01, 0x01FE, 0x7E00, 0x01FE, 
  120.   0x7E00, 0x01FE, 0x7E00, 0x01FE, 
  121.   0x7E00, 0x01FE, 0x7F00, 0x03FE, 
  122.   0x7FFF, 0xFFFE, 0x3FFF, 0xFFFC
  123. };
  124.  
  125. WORD RSBB4DATA[] =
  126. { 0x0000, 0x0000, 0x0000, 0x0000, 
  127.   0x1FFF, 0xFFE0, 0x2C00, 0x00F0, 
  128.   0x3407, 0x80D8, 0x2C0F, 0xC0BC, 
  129.   0x340C, 0xC0DC, 0x2C00, 0xC0BC, 
  130.   0x3401, 0x80DC, 0x2C03, 0x00BC, 
  131.   0x3403, 0x00DC, 0x2C00, 0x00BC, 
  132.   0x3403, 0x00DC, 0x2C03, 0x00BC, 
  133.   0x3400, 0x00DC, 0x2FFF, 0xFFBC, 
  134.   0x3555, 0x555C, 0x2AAA, 0xAABC, 
  135.   0x35FF, 0xFD5C, 0x2B80, 0x06BC, 
  136.   0x3538, 0x035C, 0x2B38, 0x02BC, 
  137.   0x3538, 0x035C, 0x2B38, 0x02BC, 
  138.   0x3538, 0x035C, 0x2B38, 0x02BC, 
  139.   0x3500, 0x035C, 0x1FFF, 0xFFFC, 
  140.   0x0FFF, 0xFFFC, 0x07FF, 0xFFF8, 
  141.   0x0000, 0x0000, 0x0000, 0x0000
  142. };
  143.  
  144. WORD RSBB5DATA[] =
  145. { 0x0000, 0x0000, 0x0001, 0xC000, 
  146.   0x0002, 0x2000, 0x0002, 0x2000, 
  147.   0x0002, 0x4000, 0x0004, 0x2000, 
  148.   0x0008, 0x1000, 0x0011, 0x0800, 
  149.   0x0022, 0x4400, 0x00C4, 0x8300, 
  150.   0x0109, 0x2080, 0x0112, 0x4880, 
  151.   0x0200, 0x0040, 0x0200, 0x0040, 
  152.   0x022A, 0x5220, 0x0400, 0x0420, 
  153.   0x0480, 0x0120, 0x0420, 0x0420, 
  154.   0x04C0, 0x0120, 0x0400, 0x0420, 
  155.   0x04A0, 0x0920, 0x07FF, 0xFFE0, 
  156.   0x0800, 0x0010, 0x07FF, 0xFFE0, 
  157.   0x00DF, 0xFD00, 0x00B0, 0x0B00, 
  158.   0x00D7, 0x0D00, 0x00B5, 0x0B00, 
  159.   0x00D5, 0x0D00, 0x007F, 0xFF00, 
  160.   0x003F, 0xFE00, 0x0000, 0x0000
  161. };
  162.  
  163. WORD RSBB6DATA[] =
  164. { 0x0000, 0x0000, 0x0000, 0x0000, 
  165.   0x0000, 0x0000, 0x0000, 0x0000, 
  166.   0x0000, 0xFFFC, 0x0021, 0x400E, 
  167.   0x0FF1, 0xC00B, 0x1FF9, 0x400F, 
  168.   0x3FF1, 0xC00B, 0x3C21, 0x400F, 
  169.   0x0001, 0xC00B, 0x7FFF, 0x7FFF, 
  170.   0xA007, 0xAAAB, 0xE005, 0x5557, 
  171.   0xA007, 0xBFFB, 0xE005, 0x6017, 
  172.   0xA007, 0xAE1B, 0xE005, 0x6A17, 
  173.   0xBFFF, 0xAA1B, 0xD555, 0xFFFE, 
  174.   0xAAAB, 0xFFFC, 0xDFFD, 0x8000, 
  175.   0xB00B, 0x8878, 0xD70D, 0x9FF8, 
  176.   0xB50B, 0xBFF0, 0xD50D, 0x9FE0, 
  177.   0x7FFF, 0x0800, 0x3FFE, 0x0000, 
  178.   0x0000, 0x0000, 0x0000, 0x0000, 
  179.   0x0000, 0x0000, 0x0000, 0x0000
  180. };
  181.  
  182. BITBLK rs_bitblk[] =
  183. { RSBB0DATA,   4,  32,   0,   0, 0x0001,
  184.   RSBB1DATA,   4,  32,   0,   0, 0x0003,
  185.   RSBB2DATA,   4,  32,   0,   0, 0x0006,
  186.   RSBB3DATA,   4,  32,   0,   0, 0x0002,
  187.   RSBB4DATA,   4,  32,   0,   0, 0x0001,
  188.   RSBB5DATA,   4,  32,   0,   0, 0x0001,
  189.   RSBB6DATA,   4,  32,   0,   0, 0x0001
  190. };
  191.  
  192. OBJECT rs_object[] =
  193. { 
  194.   /******** Tree 0 ALRTPAGE ****************************************************/
  195.         -1, ALICON  , ALBUT3  , G_BOX     |0x8900,   /* Object 0  */
  196.   FLAGS10, OUTLINED, (LONG)0x00011100L,
  197.   0x0000, 0x0000, 0x0014, 0x0009,
  198.   ALTEXT1 ,       -1,       -1, G_IMAGE   ,   /* Object 1 ALICON */
  199.   NONE, NORMAL, (LONG)&rs_bitblk[0],
  200.   0x0002, 0x0001, 0x0004, 0x0002,
  201.   ALTEXT2 ,       -1,       -1, G_STRING  ,   /* Object 2 ALTEXT1 */
  202.   NONE, NORMAL, (LONG)"X",
  203.   0x000B, 0x0001, 0x0001, 0x0001,
  204.   ALTEXT3 ,       -1,       -1, G_STRING  ,   /* Object 3 ALTEXT2 */
  205.   NONE, NORMAL, (LONG)"X",
  206.   0x000B, 0x0002, 0x0001, 0x0001,
  207.   ALTEXT4 ,       -1,       -1, G_STRING  ,   /* Object 4 ALTEXT3 */
  208.   NONE, NORMAL, (LONG)"X",
  209.   0x000B, 0x0003, 0x0001, 0x0001,
  210.   ALTEXT5 ,       -1,       -1, G_STRING  ,   /* Object 5 ALTEXT4 */
  211.   NONE, NORMAL, (LONG)"X",
  212.   0x000B, 0x0004, 0x0001, 0x0001,
  213.   ALBUT1  ,       -1,       -1, G_STRING  ,   /* Object 6 ALTEXT5 */
  214.   NONE, NORMAL, (LONG)"X",
  215.   0x000B, 0x0005, 0x0001, 0x0001,
  216.   ALBUT2  ,       -1,       -1, G_BUTTON  |0x2300,   /* Object 7 ALBUT1 */
  217.   SELECTABLE|EXIT|FLAGS9|FLAGS10, NORMAL, (LONG)"X",
  218.   0x0002, 0x0007, 0x0004, 0x0001,
  219.   ALBUT3  ,       -1,       -1, G_BUTTON  |0x2400,   /* Object 8 ALBUT2 */
  220.   SELECTABLE|EXIT|FLAGS9|FLAGS10, NORMAL, (LONG)"X",
  221.   0x0008, 0x0007, 0x0004, 0x0001,
  222.          0,       -1,       -1, G_BUTTON  |0x2500,   /* Object 9 ALBUT3 */
  223.   SELECTABLE|EXIT|LASTOB|FLAGS9|FLAGS10, NORMAL, (LONG)"X",
  224.   0x000E, 0x0007, 0x0004, 0x0001,
  225.   
  226.   /******** Tree 1 INFOPAGE ****************************************************/
  227.         -1, INFOVERS,        6, G_BOX     |0x8900,   /* Object 0  */
  228.   FLAGS10|FLAGS11, OUTLINED, (LONG)0x00021100L,
  229.   0x0000, 0x0000, 0x0029, 0x0007,
  230.   INFOLINE,       -1,       -1, G_TEXT    ,   /* Object 1 INFOVERS */
  231.   NONE, NORMAL, (LONG)&rs_tedinfo[0],
  232.   0x0002, 0x0001, 0x0025, 0x0001,
  233.   INFOCOPY,       -1,       -1, G_IBOX    ,   /* Object 2 INFOLINE */
  234.   NONE, NORMAL, (LONG)0x00011100L,
  235.   0x0002, 0x0002, 0x0025, 0x0400,
  236.          4,       -1,       -1, G_TEXT    ,   /* Object 3 INFOCOPY */
  237.   NONE, NORMAL, (LONG)&rs_tedinfo[1],
  238.   0x0002, 0x0003, 0x0025, 0x0001,
  239.   INFOOK  ,       -1,       -1, G_TEXT    ,   /* Object 4  */
  240.   NONE, NORMAL, (LONG)&rs_tedinfo[2],
  241.   0x0002, 0x0005, 0x000F, 0x0600,
  242.          6,       -1,       -1, G_BUTTON  ,   /* Object 5 INFOOK */
  243.   SELECTABLE|DEFAULT|EXIT|FLAGS9|FLAGS10, NORMAL, (LONG)"OK",
  244.   0x001E, 0x0005, 0x0009, 0x0201,
  245.          0,       -1,       -1, G_TEXT    ,   /* Object 6  */
  246.   LASTOB, NORMAL, (LONG)&rs_tedinfo[3],
  247.   0x0002, 0x0006, 0x0017, 0x0600,
  248.   
  249.   /******** Tree 2 CHARPAGE ****************************************************/
  250.         -1,        1, CHARCANC, G_BOX     |0x8900,   /* Object 0  */
  251.   FLAGS10|FLAGS11, OUTLINED, (LONG)0x00021100L,
  252.   0x0000, 0x0000, 0x0024, 0x000B,
  253.   CHARLINE,       -1,       -1, G_STRING  ,   /* Object 1  */
  254.   NONE, NORMAL, (LONG)"Special Characters",
  255.   0x0002, 0x0001, 0x0012, 0x0001,
  256.          3,       -1,       -1, G_IBOX    ,   /* Object 2 CHARLINE */
  257.   NONE, NORMAL, (LONG)0x00011100L,
  258.   0x0002, 0x0002, 0x0020, 0x0001,
  259.   CHARCANC, CHARTXT0,        8, G_BOX     ,   /* Object 3  */
  260.   NONE, NORMAL, (LONG)0x00FE2100L,
  261.   0x0002, 0x0003, 0x0020, 0x0005,
  262.          5,       -1,       -1, G_STRING  ,   /* Object 4 CHARTXT0 */
  263.   TOUCHEXIT, NORMAL, (LONG)"\177\001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037",
  264.   0x0000, 0x0000, 0x0020, 0x0001,
  265.          6,       -1,       -1, G_STRING  ,   /* Object 5  */
  266.   TOUCHEXIT, NORMAL, (LONG)"\200\201\202\203\204\205\206\207\210\211\212\213\214\215\216\217\220\221\222\223\224\225\226\227\230\231\232\233\234\235\236\237",
  267.   0x0000, 0x0001, 0x0020, 0x0001,
  268.          7,       -1,       -1, G_STRING  ,   /* Object 6  */
  269.   TOUCHEXIT, NORMAL, (LONG)"\240\241\242\243\244\245\246\247\250\251\252\253\254\255\256\257\260\261\262\263\264\265\266\267\270\271\272\273\274\275\276\277",
  270.   0x0000, 0x0002, 0x0020, 0x0001,
  271.          8,       -1,       -1, G_STRING  ,   /* Object 7  */
  272.   TOUCHEXIT, NORMAL, (LONG)"\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337",
  273.   0x0000, 0x0003, 0x0020, 0x0001,
  274.          3,       -1,       -1, G_STRING  ,   /* Object 8  */
  275.   TOUCHEXIT, NORMAL, (LONG)"\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\377",
  276.   0x0000, 0x0004, 0x0020, 0x0001,
  277.          0,       -1,       -1, G_BUTTON  ,   /* Object 9 CHARCANC */
  278.   SELECTABLE|DEFAULT|EXIT|LASTOB|FLAGS9|FLAGS10, NORMAL, (LONG)"Cancel",
  279.   0x0019, 0x0009, 0x0009, 0x0201,
  280.   
  281.   /******** Tree 3 ICONPAGE ****************************************************/
  282.         -1, ICON1   ,        6, G_BOX     ,   /* Object 0  */
  283.   NONE, OUTLINED, (LONG)0x00021100L,
  284.   0x0000, 0x0000, 0x0027, 0x0006,
  285.          2,       -1,       -1, G_IMAGE   ,   /* Object 1 ICON1 */
  286.   NONE, NORMAL, (LONG)&rs_bitblk[1],
  287.   0x0002, 0x0001, 0x0004, 0x0002,
  288.          3,       -1,       -1, G_IMAGE   ,   /* Object 2  */
  289.   NONE, NORMAL, (LONG)&rs_bitblk[2],
  290.   0x0008, 0x0001, 0x0004, 0x0002,
  291.          4,       -1,       -1, G_IMAGE   ,   /* Object 3  */
  292.   NONE, NORMAL, (LONG)&rs_bitblk[3],
  293.   0x000E, 0x0001, 0x0004, 0x0002,
  294.          5,       -1,       -1, G_IMAGE   ,   /* Object 4  */
  295.   NONE, NORMAL, (LONG)&rs_bitblk[4],
  296.   0x0014, 0x0001, 0x0004, 0x0002,
  297.          6,       -1,       -1, G_IMAGE   ,   /* Object 5  */
  298.   NONE, NORMAL, (LONG)&rs_bitblk[5],
  299.   0x001A, 0x0001, 0x0004, 0x0002,
  300.          0,       -1,       -1, G_IMAGE   ,   /* Object 6  */
  301.   LASTOB, NORMAL, (LONG)&rs_bitblk[6],
  302.   0x0020, 0x0001, 0x0004, 0x0002
  303. };
  304.  
  305. OBJECT *rs_trindex[] =
  306. { &rs_object[0],   /* Tree  0 ALRTPAGE */
  307.   &rs_object[10],   /* Tree  1 INFOPAGE */
  308.   &rs_object[17],   /* Tree  2 CHARPAGE */
  309.   &rs_object[27]    /* Tree  3 ICONPAGE */
  310. };
  311.